home *** CD-ROM | disk | FTP | other *** search
/ BMW 3 Series Presentation / BMW_3Series_Presentation_CD.bin / Xtras / FileXtra / Mac / FileXtra.dir / 00018_Script_GetMessage(int theNum) < prev    next >
Text File  |  1997-12-06  |  1KB  |  30 lines
  1. on GetMessage theNum
  2.   case theNum of
  3.     0: set message to "successful completion"
  4.     -1: set message to "General error of unknown origin"
  5.     -5: set message to "File deletion failure"
  6.     -6: set message to "File rename failure"
  7.     -7: set message to "File not found"
  8.     -8: set message to "Specified file is actually a directory"
  9.     -9: set message to "File creation failure"
  10.     -10: set message to "File open failure"
  11.     -11: set message to "File write failure"
  12.     -12: set message to "File close failure"
  13.     -13: set message to "File read failure"
  14.     -14: set message to "Destination disk full"
  15.     -15: set message to "Directory not found"
  16.     -16: set message to "Specified directory is actually a file"
  17.     -17: set message to "Directory creation failure"
  18.     -18: set message to "Could not delete specified directory"
  19.     -19: set message to "Could not retrieve directory ID number"
  20.     -40: set message to "Could not allocate memory for file copy"
  21.     -51: set message to "Specified drive does not exist"
  22.     -52: set message to "Specified drive exists but is not mounted"
  23.     -61: set message to "Specified drive is not a CD-ROM"
  24.     -210: set message to "New filename already exists or two paths are different"
  25.     otherwise set message to "unknown error code"
  26.   end case
  27.   
  28.   return(message)
  29. end
  30.